The 640 MEG Shareware Studio 4/The 640 Meg Shareware Studio CD-ROM Volume IV (Data Express)(1994).ISO/clang/120_01.zip/META4.M4

Text File | 1993-06-01 | 7KB | 1,205 lines

s
xm;
gcompile
e
...rvalue
gidname
f/1
gcatname
lm:
l
f/2
gidfield
x
pm
0m0c
...2
t/3
s
f/4
...4
...3
x
...1
t/5
gconstsimp
f/6
pn/
!c
p
...6
t/5
lm+
l
f/7
gexpression
x
p!
...7
...5
r
...expression
gterm
f/8
...9
lm+
l
f/10
gterm
x
p!+
o
...10
t/11
lm-
l
f/12
gterm
x
p!-
o
...12
...11
t/9
s
x
...8
...13
r
...term
gfactor
f/14
...15
lm*
l
f/16
gfactor
x
p!*
o
...16
t/17
lm/
l
f/18
lm256
l
x
phz
o
p!d
o
pzy
o
...18
t/17
lm%256
l
f/19
phy
o
pn/
p256*
o
p!-
o
...19
...17
t/15
s
x
...14
...20
r
...factor
lm(
l
f/21
gexpression
x
lm)
l
x
...21
t/22
gconstsimp
f/23
pn/
!c
py
o
...23
t/22
gidname
f/24
gcatname
lm:
l
f/25
gidfield
x
pm
0m0c
...25
t/26
s
f/27
...27
...26
x
py
o
...24
t/22
lm-
l
f/28
gfactor
x
p!z
o
pn/
p0y
o
pz-
o
...28
...22
r
...catname
0m0y
!l
r
...toplace
gidname
f/29
02
lm:
l
f/30
gidfield
x
pi
0m0c
...30
t/31
s
f/32
...32
...31
x
20
gcatname
...29
...33
r
...declare
lm.field
l
f/34
...35
gidnew
f/36
02
gconstexp
x
gcheckfrange
0i02
n/3 i32
...36
...37
t/35
s
x
lm;
l
x
...34
t/38
lm.name
l
f/39
...40
gidnew
f/41
02
gconstexp
x
!i02
n/1 i32
...41
...42
t/40
s
x
lm;
l
x
...39
t/38
lm.constant
l
f/43
...44
gidnew
f/45
02
gconstexp
x
n/2 i32
!i02
...45
...46
t/44
s
x
lm;
l
x
...43
...38
r
...constexp
gconstterm
f/47
...48
lm+
l
f/49
gconstterm
x
!+
...49
t/50
lm-
l
f/51
gconstterm
x
!-
...51
...50
t/48
s
x
...47
...52
r
...constterm
gconstfac
f/53
...54
lm*
l
f/55
gconstfac
x
!*
...55
...56
t/54
s
x
...53
...57
r
...constsimp
ln
l
f/58
0y
...58
t/59
gidcons
f/60
0m0y
...60
t/59
lq'
l
f/61
n/0sy
...61
t/59
lm.x
l
f/62
lh
l
x
0y
...62
...59
r
...constfac
gconstsimp
f/63
...63
t/64
lm-
l
f/65
gconstfac
x
!z
n/0y
z-
...65
t/64
lm(
l
f/66
gconstexp
x
lm)
l
x
...66
...64
r
...idtype
li
f/67
me
0m3y
z=
l
r
.67
l
z9
r
...idname
n/1 z
gidtype
f/68
...68
...69
r
...idfield
n/3 z
gidtype
f/70
...70
...71
r
...idcons
n/2 z
gidtype
f/72
...72
...73
r
.. idnew
n/0 z
gidtype
f/74
...74
...75
r
...checkfrange
0y
n/5 <
sc
...76
...77
f/78
r
j/79
...78
s
t/80
0c
p is too big for a field
xo
...80
...79
r
...aout
lm*1
l
f/81
pu
o
...81
t/82
lm*2
l
f/83
pv
o
...83
t/82
lm*
l
f/84
pc
o
...84
t/82
lq'
l
f/85
...85
t/86
lq"
l
f/87
...87
...86
f/88
pp
c
o
...88
t/82
grvalue
f/89
pc
o
...89
t/82
lm.h
l
f/90
grvalue
x
ph
o
...90
t/82
lm.
l
f/91
pxn
o
...91
...82
r
...notsyn
lm.out
l
f/92
lm(
l
x
...93
gaout
t/93
s
x
lm)
l
x
...92
t/94
lm.lab
l
f/95
pp...
o
gaout
x
...95
...94
f/96
po
o
...96
t/97
lm.act
l
f/98
lm(
l
x
...99
lq'
l
f/100
...100
t/101
lq"
l
f/102
...102
...101
f/103
c
lm*1
l
f/104
u
...104
t/105
lm*2
l
f/106
v
...106
t/105
s
f/107
...107
...105
x
o
...103
t/108
lq!
l
f/109
...109
...108
t/99
s
x
lm)
l
x
...98
t/97
lm]
l
f/110
grvalue
x
py
o
...110
t/97
grvalue
f/111
lm=:
l
x
gtoplace
x
o
...111
t/97
lm.if
l
f/112
lm(
l
x
gcexp
x
lm)
l
x
pf/
u
o
...113
gnotsyn
t/113
s
x
lm.else
l
f/114
pj/
v
o
p...
u
o
ps
o
...115
gnotsyn
t/115
s
x
lm.end
l
x
p...
v
o
...114
t/116
lm.end
l
f/117
p...
u
o
ps
o
...117
...116
x
...112
t/97
lm.cat
l
f/118
lm(
l
x
...119
gaout
t/119
s
x
lm)
l
x
...118
t/97
lm.condlab
l
f/120
lm*1
l
f/121
puy
o
p0=
o
pt/
u
o
pp...
o
pu
o
...121
t/122
lm*2
l
f/123
pvy
o
p0=
o
pt/
u
o
pp...
o
pv
o
...123
...122
x
po
o
ps
o
p...
u
o
...120
t/97
gerrormessage
f/124
...124
t/97
lm.error
l
f/125
psf
o
...125
t/97
lm.succeed
l
f/126
ps
o
...126
t/97
lm.fail
l
f/127
psf
o
...127
t/97
lm&
l
f/128
gidnew
x
pg
c
o
...128
t/97
lm.return
l
f/129
pr
o
...129
t/97
lq!
l
f/130
...130
...97
r
...cright
lm==
l
f/131
py
o
grvalue
x
p=
o
...131
t/132
lm!=
l
f/133
py
o
grvalue
x
p=
o
psc
o
...133
t/132
lm<=
l
f/134
py
o
grvalue
x
p<
o
psc
o
...134
t/132
lm>=
l
f/135
py
o
grvalue
x
p>
o
psc
o
...135
t/132
lm<
l
f/136
py
o
grvalue
x
p>
o
...136
t/132
lm>
l
f/137
py
o
grvalue
x
p<
o
...137
...132
r
...cterm
gcfac
f/138
...139
lm.andif
l
f/140
pf/
v
o
gcfac
x
...140
...141
t/139
s
x
vy
0=
t/142
p...
v
o
s
...142
...138
...143
r
...cfac
grvalue
f/144
gcright
x
...144
t/145
lm.not
l
f/146
gcfac
x
psc
o
...146
t/145
lm(
l
f/147
gcexp
x
lm)
l
x
...147
t/145
lm&
l
f/148
gidnew
x
pg
c
o
...148
...145
r
...cexp
gcterm
f/149
...150
lm.orif
l
f/151
pt/
u
o
gcterm
x
...151
...152
t/150
s
x
uy
0=
t/153
p...
u
o
s
...153
...149
...154
r
...errormessage
lm.erms
l
f/155
lm(
l
x
pt/
u
o
...156
gaout
t/156
s
x
lm)
l
x
pxo
o
p...
u
o
...155
...157
r
...syn
gidnew
f/158
pg
c
o
...158
t/159
lq'
l
f/160
plm
c
o
pl
o
...160
t/159
lm.id
l
f/161
pli
o
pf/
u
o
pl
o
pme
o
p...
u
o
...161
t/159
lm.num
l
f/162
pln
o
pl
o
...162
t/159
lm.str
l
f/163
lq'
l
f/164
...164
t/165
lq"
l
f/166
...166
...165
x
plq
c
o
pl
o
...163
t/159
lm.emp
l
f/167
ps
o
...167
t/159
lm$
l
f/168
p...
u
o
gsyn
x
pt/
u
o
ps
o
...168
t/159
lm(
l
f/169
gphrase
x
lm)
l
x
...169
t/159
lm.hexnum
l
f/170
plh
o
pl
o
...170
...159
f/171
gerrormessage
f/172
...172
t/173
s
f/174
...174
...173
x
...171
...175
r
...seq
gsyn
f/176
pf/
u
o
...177
gsyn
f/178
px
o
...178
t/179
gnotsyn
f/180
...180
...179
t/177
s
x
p...
u
o
...176
...181
r
...alts
gseq
f/182
...183
lm/
l
f/184
pt/
u
o
gseq
x
...184
...185
t/183
s
x
uy
0=
t/186
p...
u
o
s
...186
...182
...187
r
...phrase
lm.prep
l
f/188
...189
gnotsyn
t/189
s
x
galts
x
...188
t/190
galts
f/191
...191
t/190
gnotsyn
f/192
...193
gnotsyn
t/193
s
x
...192
...190
r
...statement
li
f/194
l
me
...194
f/195
p...
c
o
lm=
l
x
gphrase
x
lm;
l
x
pr
o
lq!
l
f/196
...196
t/197
s
f/198
...198
...197
x
...195
...199
r
...compile
lm.syn
l
f/200
li
f/201
l
me
...201
x
ps
o
pxm;
o
pg
c
o
pe
o
xm;
...202
gdeclare
t/202
s
x
...203
gstatement
t/203
s
x
...200
...204
r